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APPENDIX 

; DEFINE FILES USED 

; Proper listing of all files being use during compiling of the source code. 
';««»« BEGIN DEFINE — ««.«— — .-.»——-———«»———»-— «——«—«» 

DEFINE TRI_CODE 

INCLUDE "TRICODEJDEF. INC" 

SEGMENT TRI_CODE 

;..«. END DEFINE ««.-.-«-«««—•--•-«-•—«—»——-——— — — — "— 



; IRQ VECTOR DEFINITION - 

; Define the subroutine that will be called upon interupt (if enabled). 
; IRQ3 (P30) will be the only one that ie enabled for this project. 
; This is the RADIO input interupt. 

BEGIN IRQ VECTOR ..«-«.«...— ----- — «- — --«--«-«-■ 
ORG %00 ;T°P °* Program memmory. 

.WORD RAD I 0_ INTERUPT ;IRQ0. P32 input from radio input circuit. 

IRQ1_VECT0R ;IR01. P33 

IRQ2~VECT0R ;IRQ2 vector, P31 

IRQ3_VECTOR ;IRQ3, P30 

TO_INTERUPT ;IRQ4. TO interupt. 

Tl INTERUPT ;IRQ5, Tl interupt. 



.WORD 
.WORD 
.WORD 
.WORD 
.WORD 



s — b END IRQ VECTOR 



;«« BEGIN MAIN CODE 
MAIN: 
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OHG %oc ; Beginning address ot ROM code 

,Initi.li«ing hdt section -Must be done durin9 the first 60 instruction cycles 

urrT ; Enable HDT. . „ 

™* , select Working Reg GroupO. Expand Reg G">upF 

1? 5dXr 800001111B iint RC osc . -80 msec, HDT on during HALT or STOP, 

clr HDTHR.SOOOOiniB jRe turn Register Pointer to BankO (standard) 

.■Initializing HDT Section———.- 

DI .-Disable all interupt. 

id nitl p^:« 9 pcon!iSi rt 8eCti ° n ""i;i t ial value or PCOH See TriCodeR*. inc tor details. 

Id P01M,«p01m_ini 
Id P2M.Sp2m_ini 

Id P2M_COPY,«p2m_ini ; Mirrqring P2M 

Id P3M,flp3m_ini 

clr P0 ; 

clr P2 

clr P3 

.•Initializing I/O port section*--"- ; 

.Initializing INTERUPT section- — «; -„ A . . , 

id IPR fiipr ini .Priority IR00. 2. 4 , 1 . 5. 3 . 

J2 IRO !ira in .'Clear out all IRQ initially. 

j Initializing INTERUPT section——; 

ii Btl "}IS:5 ™ 8eCti ° n values tor M control registers. 

Id PRE0,flpreO_lOOusec 
Id T0,*t0_lmsec 
clr PRE! 

RESET MULTIPLIER ^lear TO multiplier. 

;lntiallzing TIMER section — — — ; 

jp START tQoto Start of P r ^ r ** M- ^ -MM „. ......... ...... — 

.... END MAIN CODE — i — .—.— ——-■ — •———""—• 



: 

^T^Receiver mode: _ , J or ( CONTROL.! NPUTS) 

, 2. TO properties* TOJWLTIPLIER 
; Out put: 

1. Data bits value for valid signal. 

2. Reset control bits to indicate invalid data. ......... 

... BEGIN RADIO INTERUPT SERVICE ROUTINE - — — 

RAD 1 0_ INTERUPT : 



•*••*•**•* 



HDT 
push FLAGS 
Id T0_VALUE ( T0 
RELOADJT0 

TEN MSEC NOT_PASSED 
C p ~ T0~MULTIPLIER,fi012H 
jp ugt , FI RST_EDGE 
tm DATA_FLAGS, HOOOOOOIOB 
j p z . EX IT_RADI 0_I NT 
NEXT EDGE: 

RlsET MULTIPLIER 

tm "P3.«00000100B 

jp nz.LOW PULSEJUDTH 



;Save FLAGS register for normal operation. 
•Save TO value for calculation later. 
[•Reload the initial value for TO. 

'check if at least 18 msec has elapsed. 

• If so this is the first edge of the first pulse. 

;Test if first edge already detected. 

•If not then just exit. 



.-Retet the 1msec multiplier for TO • 
i Check the present input state of radio s 
If 'HI' then current pulse width is low. 



input . 
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HI_PULSE 
tm 

MULTI_ON 
cp 
jp 
jP 

cp 

jp 
cp 

jp 

LOGIC 
jp 



> VERIFYING ONTIME PULSE WIDTH ---.»••-...«...-...««---..«....------------- 

.WIDTH: 

CONTROL_INPUTS,fl00000100B ;Test for * B ' mode. 

nz,LINEAR_ON_TIME_CHECK ;If it is then goto check its "on time* width. 

tea MULT I /STANLEY PULSE CHECK B«tt«.aB«BB*e«eBBo.BSBBBBSBB»Be».BBBB»B«BBB««B 

_TIME__CHECK: ,-else check C */l ^ ontime width. 

TO_MULTIPLIER # flOlH ,-Check the 1msec multiplier. 

ugt ,NOT_VALID_DATA_BIT ;if greater than or equal 2 msec then not good, 

z , ATLEAST_1MSEC ;If equal to 1 then check for logic '1' pulse. 

;«BBB LOGIC '0' CHECK — = - = .BOB... B .....».« . 

T0_VALUE,fl07H 
ugt , NOT_VALID_DATA_BIT 
T0_VALUE,ff05H 
ul t , NOT_VALID_DATA_BIT 
0 

GOOD_ON_TIME_MEASURED 

LOGIC ~0' CHECK « 



;Is it less than or equal .3 msec. 

; I f so then not good data. 

;Is it more than or equal .6 msec. 

;If so then data is no good. 

;.3 <« WIDTH <« .6 therefor logic ' 

; Goto good on time measured. 



BBBBBBBB — OS* — * 



3 — — — — B B C 



LOGIC *!• CHECK ..-----..-.---.---.-.-----o....... ......... ......«--... 

ATLEAST_1MSEC: 

cp T0_VALUE, flOBH ;Is it less than or equal 1.2 msec, 

jp ugt,NOT_VALID_DATA_BIT ;If so then data is no good, 

cp T0_ VALUE, H04 H ;Is it greater than or equal 1.7 msec, 

jp ult,NOT_VALID_DATA_BIT ;if so data is no good. 

LOGIC_l ;1.2 <- WIDTH <« 1.7 therefor logic '0'. 

jp GOO D_ON_T I M E_M E AS UR E D ;Goto good on time measured. 

•bbbb LOGIC •!• CHECK o 
;.b« 8 MULT I /STANLEY PULSE CHECK »«•»«««...«.«.*«»..«*.»«««.««. 8 .«bb. «oa.«..o... 
LINEAR_ON_TIME_CHECK : 

;.«..« VERIFYING ONTIME PULSE WIDTH --.......—.—..-«...«...——.«——»>— 

...... VERIFYING OFFTIME PULSE WIDTH ....... ...... .......«•...••..-...— ....... — 

LOW_PULSE_WIDTH : 

cp IlT_COUNTER,»0AH ;Is bit counter at 10. 

jp z,NOT_VALID_DATA_BIT ;If it reaches 10 then there is something wrong 

tm DATA_FLAGS, ftOOOOOOOlB ;Test for a good ontime was measured previously, 

jp z , NOT_VALI D_DATA_B I T ;If it's not then don't bother to check off time, 

tm CONTROL_INPUTS # 800000100B ;Test f or . & mode. 

jp nz,LINEAR_OFF_TIME_CHECK ;If it is then goto check its »off time* width. 
MULT I OFF TIME CHECK: 



LI NEAR_OFF_TI ME — CHECK : 

VERIFYING OFFTIME PULSE WIDTH —»•»...........«...-.-..-.—...—....—*«* 

;...«. GOOD ON TIME MEASURED SECTION —.«-*.«...•..«—-.-«.-—«.--* — — *•»■«—« 

GOODONJTIMEMEASURED : 

or DATA_FLAGS,«00000001B ;Set good ontime pulse flag bit. 

jp EXIT_RADIO_INT 

•« B ... GOOD ON TIME MEASURED SECTION ----------------------------------------------- 

VALI D_DATA_B I T : 

jp EXIT_RADIO_INT 

N0T_VALID_DATA_BIT : 

and DATA_FLAGS, ftllUUOOB ;Clear good 'ontime' and the 'first edge* flag bit. 

EX I TRADI O I NT : 
pop FLAGS 
iret 

FIRST EDGE INTERUPT SECTION -.«««.. .b«.« 8 b 8 ..bbbbbb.b. 8 ..b. 8 . 8 .b.-« 8 ..«,.«...*. 

FIRST_EDGE: 

RESET_MULTI PL I ER ;Reset ^0 multiplier to zeio. 

RESET BIT COUNTER 



-A4- 



RESET_BIT_1_P0SITI0N 
RES ET_B I T_0~POS I T I ON 
or DATA_FLAGS # |J00000010B 
jp EXIT_RADIO_INT 

;«.«« FIRST EDGE INTERUPT SECTION «« 
-«a END RADIO INTERUPT SERVICE ROUTINE 



;Set bitl for first edge detected. 



;..«« IRQ1JVECTOR INTERUPT SERVICE ROUTINE «oooo. 

BEGIN IRQl_VECTOR INTERUPT SERVICE ROUTINE 
IRQl_VECTOR 
iret 

;..~o END IRQ1 VECTOR INTERUPT SERVICE ROUTINE »- 



;«» IRQ2_VECTOR INTERUPT SERVICE ROUTINE «=«=».--- 
;« BS « BEGIN IRQ2_VECTOR INTERUPT SERVICE ROUTINE 
IRQ2_VECTOR 
iret 

END IRQ2 VECTOR INTERUPT SERVICE ROUTINE ««"■ 



IRQ3_VECTOR INTERUPT SERVICE ROUTINE «*«oo. 
;,= = = = BEGIN IRQ3_VECTOR INTERUPT SERVICE ROUTINE 
IRQ3_VECTOR 
iret 

;..<,. END IRQ3_VECTOR INTERUPT SERVICE ROUTINE 
r.o INTERUPT SERVICE ROUTINES SECTION 



«*.. T0_VECTOR INTERUPT SERVICE ROUTINE ■-•«■—■•• — — -■■- — ■««««■««-•■ — ■■--»•-■■• 

Purpose: 

This interupt capture TO timer. It is started by the first state change in Radio Int. 
at pin32 (IRQO). It is continous counting. It should time out (get here) every 1 msec 
The TO_MULTIPLIER is then incremented, therefore this register value can be considered 
as the msec value. The initial value for TO is 10 (decimal), therefor each count in TO 
is an equivalent of .1 msec. Example: if TO * 6 the .2 msec has elapsed. 
Input : 

TO reaches end of count. 
Output : 

T0_MULTI PLI ER : Store the ft of TO timeout (msec) without Radio interupt being detected. 
.... BEGIN T0_VECTOR INTERUPT SERVICE ROUTINE «- •••. — •->•--« «o«««««-«« = = 
T0_ INTERUPT 
WDT 

FLAGS ;Save flags 

T0_MULTI PLI ER ; Increment the xmsec counter. 

T0_MULTIPLIER,ff0AH ;Test if 10 msec has elapsed. 
z,NO_PULSE_FOR_10MSEC;If so set the proper bit. 

T0J4ULTIPLIER,fl023H ;If 35 msec (23H) has passed then stop counting. 
z,STOP_COUNTlNG ;If no signal for 35 msec stop the timer. 

; 



push 
inc 



cp 

jp 
cp 

JP 
jP 



EX I T_T0_ I NTERU PT 
NO_PULSE_FOR_10MSEC : 

TEN_MSEC_PASSED 
STOP_COUNTING: 

DISABLE_T0_COUNT 
LD T0_MULTI PLI ER, If 0 FFH 
EX I T_T0_I NTERU PT : 
pop FLAGS 
iret 

;mmm » END TO VECTOR INTERUPT SERVICE ROUTINE 



;10 msechas passed since last pulse. 
;Stop TO count. 

;Set all bits for overcount . (no signal for 35msec) 
; restore flags value. 



;.«.. Tl_VECTOR INTERUPT SERVICE ROUTINE -«-««- 
;.» B . BEGIN Tl_VECTOR INTERUPT SERVICE ROUTINE 
T1_INTERUPT 

WDT 

iret 

...... END Tl VECTOR INTERUPT SERVICE ROUTINE 



END INTERUPT SERVICE ROUTINES SECTION 
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READ PO INPUTS •.«.......———>-*.—»»-»-—..••«..-•.•——««-•-——««.«. 

; Purpose : 

; 1. Read PO inputs with debounce. Inputs roust be the same for 10 consecutive read cycles 
; to be a valid Input. If no valid reading can be obtained the WDT will reset the uC. 
; General Algorithym: 

; P2 I/O controls which set of PO input is being read so it's roust be know prior to 

; calling this routine. The entire PO is read minrouro of 10 tiroes, each tine the previous 
• value is compared to the current value. If they are not the same (noises) then the 
; counter is reset and the process repeat. 10 consecutive identical reading is required for 
; a valid input for PO. If such condition can not be achieved then the WDT should time out 
; and reset the micro. This would avoid a infinite loop. 
; Input: 

; 1. P2M I/O controls: 
; Out put : 

; 1. P0_INPUT: All 
; Subroutine called: 
; 1. None. 

;«*» BEGIN READ PO INPUTS «..«»-.«-«««.—«.— —-—«-«— -—-— — «---. *«»*.«. ««..o«.. 
READ_P0: 
WDT 

Id DEBOUNCE_COUNTER,ttdebounce_value;load initial value for debounce counter (10) 
Id OLD_INPUT,P0 ;Read PO and store it as previous input. 

WDT . 
DEBOUNCE_P0 : 

Id NEW_INPUT,P0 ;Read PO and store as current input. " 

cp OLD_INPUT,NEW_INPUT ;Compare previous and current input, 

jp z,P0_SAME ;If the same then goto P0_SAME. 

PO NOT SAME: 



must be pre-determine by the calling routine, 
the content of PO is stored in PO INPUT. 



Id 

jP 
P0_SAME: 
dec 
jP 



DEBOUNCE_COUNTER,«debounce_value; reload initial value for debounce counter 
SAVE NEW INPUT 



DEBOUNCE_COUNTER 
z,EXIT_READ_P0 
SAVE_NEW_I NPUT : 

Id OLD_INPUT,NEW_INPUT 
jp DEBOUNCE_P0 



; decrement debounce counter. 
;If zero then exit 

;Save current input. 
; Re -read PO again. 



EXITREADPO : 

Id P0_INPUT,NEW_INPUT 
ret 

BEGIN READ PO INPUTS - 



; Store new input in P0_INPUT register. 
;EXIT 



SET RP CHANNEL ———————————————————————————— 

; Purpose: 

; Set P2S hi or low according to the mode slide switch input: 
; C~ - CHANNEL 1 (300 MHz) -> P25 - OUTPUT/ LO 

Q U & « CHANNEL 2 (310 MHz) -> P25 « INPUT/HI Z. 
; General Algorithm: 

; Use the input from CONTROL_INPUTS register to determine the out put of P2S. 

; Input: 

; CONTROL_INPUTS 
;Output: 

; P2S'8 state. No other register is affected. 

BEGIN SET RP CHANNEL 
SET_RF_CHANNEL: 
WDT 

tm CONTROL_INPUTS, A00000010B .-Test for C *' input, 
jp nz,TUNE~TO_300MHz ;Goto and tune to 300MHz. 

TUNE_TO_310MHz: 

or P2M_COPY, A00100000B ;Set P25 to input/Hi Z. 

Id P2m7p2M_COPY 

ret ; ^ 

TUNE TO 300MHz: 
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and MM cdPY.iiioiiuiB ;Set P2«. co output 



Id P2M,P2M_COPY 
NOP 



,-Waete l-cycle for change state. 



P2.g00100000B .Set out put to lo/GMD. 



or 
ret 

»mmu END SET RF CHANNEL 



READ CONTROL INPUTS 



.•Purpose: „ A mode of operation. 

I J: ES S STT-lS"™^ l^y operation for both channel. 

'^""set^irpln-to output and set it HI (SV, . Read PO to determine the slide switch position 

' ,. r c ft > and the switch mode (constant pressure or momentary - After 

' , ' \a „.„; th . outout P24 to LO then change it to an input pin (high 

, complete the read reset the output P24t e gister for future use. This register 

i sSSH S&irjs sffiarsr jar - - 

; Input : 

; 1. None 

.-Output: chanqe accordingly other remain undisturb. 

, 2. CONTROL_INPUTS register bits 0,1.2.5,6 will cnange * 7 

; Subroutine called: 

; 1. READ_P0. — — — — 

BEGIN READ CONTROL INPUTS — - .—-———« 

READ_CONTROL_INPUTS: 

and P2M COPY «11101111B ;Using P2M_C0PY as intermediate/P2M is write only. 

?S P2M~ P2M COPY .-Change only P24 to output undisturb the rest. 

Id P2M.P2M.COPY ; wait one cycle before put data on output pin. 

or P2.H00010000B ;Set P24 to Hi (Mode select switch) . 

P2 •11101111B ~ .'Shut off P24 output. 

P2,B1 , H ait 1 cycle before I/O change. 

P2M COPY flOOOlOOOOB .Set P24 to high impedance input. 

mSTpTcOPY .using P2M.COPY as intermediate register. 



and 
NOP 
or 
Id 
ret 

,-»«- END READ CONTROLS INPUTS 



;.««. READ DIP SWITCH 

i^I^Read DIP switch input to determine the unique code. 

rr^etermine^e channel using CONTROL.INPUT registers bit 0.1.2. It bit 1 is high then 
it's channel 1 OOOMhz) otherwise it's channel 2. 



3 times. 

5. The final format of the register should be: 
DI p_S W_H I BYTE : Dl D2 D3 D4 D5 D6 D7 D8 
DIP SW LOW BYTE : D9 D10 0 0 0 0 0 



i'T'cONTROL.INPUTS: to determine which set of DIP switch to read from. 
i^rDIP.SH.LOHBYTE. DIP.SW.HIBYTE: Store- the ID code read from DIP switches 



jSubroutine called: 
; 1. READ_P0. 
;»«»» BEGIN READ DIP SWITCH 
READ_DIP_SWITCH: 
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HDT 

tm CONTROL_INPUTS,«00000010B jTest for G (node select- 
jp nz,READ_Sl ;If it is then read SI inputs 

.-Otherwise read S2 (Linear or Stanley) 

; READ DIP SWITCH (S2) SECTION 

; Otherwise read S2 inputs. 

READ_S2 : 

; T READ DIP1-5-- 

and P2M_COPY,S11110111B ;Use P2M_COPY to change P23 to output pin. 

Id P2M,P2M_COPY ; Write it to P2M to change P23 to output. 

HOP ;The rest of P2M remain unchanged. 

or P2, 8dip_2_l_select ;Turn P23 on (Hi) to select dipl-5 to be read 

call READ_PO ;Read PO 

and P2,flU110111B .Reset P23 to lo. 

or P2M_COPY ( B00001000B ;Change P23 back to input pin (Hi Z> . 

Id P2M,P2M_COPY 

Id DIP_SW_HIBYTE,PO_INPUT ;Save P0_INPUT to DIP_SW_HIBYTE . 
and DIP~SW_HIBYTE,fl00011111B ;Mask out non-DIP switch input 
; READ DIP1-5 

f READ DIP6-10 

and P2M_COPY,«11111011B ;Use P2M_COPY to change P22 to output pin. 

Id P2M.P2M_COPY t Write it to P2M to change P22 to output. 

NOP "~ ;The rest of P2M remain unchanged. 

or P2,fldip_2_2_select ;Turn P22 on (Hi) to select dip6-10 to be read 

call READ_P0 . . b ;Read PO 

and P2 # «Illll0UB ;Reset P22 to lo. 

or P2M_COPY,(I00000100B ;Change P22 back to input pin (Hi Z) . 

Id P2M,P2M_COPY 

Id DIP_SW_LOWBYTE,P0_INPUT ;Save PO_INPUT to DIP_SW_IX)WBYTE . 
and DIP_SW_LOWBYTE,#00011111B ;Mask out non-DIP switch input 
; READ DIP6-10 - 

Id ROTATE COUNTER, *03H ;Load number of rotations desired (3) 

ROTATE L0WBYTE_S2: 

rlc~ DIP SWLOWBYTE ;left rotate lower byte 3 times to bring D6 

dec ROTATE_ COUNTER ;thru D10 to the left most bits, 

jp nz,R0TATE_L0WBYTE_S2 

Id ROTATE COUNTER, H03H /Load number of rotations desired (3) 

ROTATE BOTH BYTE S2: 

rlc" DIP_SW_LOWBYTB ;left rotate lower byte 3 times through carry 

rlc DIP SW_HIBYTE ;left rotate hi byte 3 tiroes through carry, 

dec ROTATEJXOJNTER ; 
jp nz t ROTATE_BOTH_BYTB_S2 

jp EXIT_READ_DIP_SHITCH ; Finalize and exit subroutine. 

; READ DIP SWITCH (S2) SECTION - * 

; READ DIP SWITCH (SI) - " 

READ_S1 : 

READ DIP1-5 

and P2M COPY, 1 11111101B ,-Use P2M_COPY to change P21 to output pin. 

Id P2m7p2H_COPY jWrite it to P2M to change P21 to output. 

HOP ;The rest of P2M remain unchanged. 

or P2 f «dip_l_l_select ;Turn P21 on (Hi) to select dipl-5 to be read 

call READ_PO ;Read PO 

and P2,II11111101B ;Reset P21 to lo. 

or P2M_COPY, ftOOOOOOlOB ; Change P21 back to input pin (Hi Z) . 

Id P2M.P2M COPY 

Id DIP SW_HIBYTE,PO_INPlTT ;Save PO_INPUT to DIP_SW_HIBYTE. 
and DIP^SWJlIBYTE.flOOOlllllB jMask out non-DIP switch input 
; READ DIP1-5 

; READ DIP6-10 — 

and P2M COPY.ttlllllllOB ;Use P2M_C0PY to change P20 to output pin. 

Id P2M.P2M COPY ;.:t : -.^ it to P2M to change P20 to output. > 

NOP ' " -The rest of P2M remain unchanged. 
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or PJ.Sdip l_2 select " ;T*rn P20 on <Hi> to select di P 6-10 to be read 

call READ_PO •• Read po 

? SISi!— » l"™ — input pin <Hi Z, . 
IS "i;'sH M S Y VT E .PO_IHPUT '^-e P0.1NPUT to DIP SJJ.LOHBVTE. 
and DIP>vTl0HBYTE, 800011 111B ,Mask out non-OIP switch input 
; READ DIP6-10-- 

Id ROTATE COUNTER, BO 3 H ,Load number of rotations desired (3) 

ROT ATE_ W WBVTE_ S l: HBYTE ^ ^ byte 3 ti.es to bring DS 

dec ROTATE'COUMTER .thru DID to the left most bits, 

jp nz,ROTATE_UWBYTE_Sl 

Id ROTATE COUNTER, S03H .Load number of rotations desired <3» 

ROTATE.BOTH BYTE^l = ^ ^ , tl-M t „ „ carry 

Se DIP>w>BYTE .left rotate hi byte 3 times through carry, 

dec ROT AT ENCOUNTER » 

jp nz , ROTATE_BOTH_BYTE_Sl ; 

, READ DIP SWITCH (SI) 

FINALIZING AND EXIT READ DIP SWITCH 

EXIT READ_DIP_SWITCH: fte i ect 
tm CONTROL INPUTS, flOOOOGOOlB ;Test for B mode select, 
jp nz , ZERO~LOWBYTE i« bo goto Zeroing out low byte. 

CLfeAR LAST 6 BIT: . 
and DIP'SW LOWBYTE. flllOOOOOOB ;Clear out the last 6 bite. 
ret ~ " ;then exit routine. 

ZE R 0 .U,HBVTE: gH ^ ^ ^ ^ „, byte only . 

t ~ ~ jthen exit routine. 
; FINALIZING AND EXIT READ DIP SWITCH * 

;...« END READ DIP SWITCH— «.««-«—««-——— 

;.«.« BEGIN START OF PROGRAM «------««-----««■-«--"""""""" 

START • 

call READ CONTROL_INPUTS ;Obtain control parameters, 

call SET R> CHANNEL sSet P25 accordingly- 

call REA5 dIp SWITCH .Obtain ID code from DIP switch, 

or IMR.«OOOo"oooiB enable IRQO (Radio interupt) . 

EI .Enable all interupts. 

PR0GRAM_tO0P^ QmTK0L mpurs .-Obtain control parameters, 

call SET RF CHANnIi. ;Set P2S accordingly, 

call REa5_dTp_SHITCH Obtain ID code from DIP switch. 
NOP 

jp PRO0RAM_lO0P ; .......... -i.- --------- 

END START OF PROGRAM ..«.-----------------" 

END 
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"!««!L-.!?!!„.!ir!!....„. /Aeeigning top of stack at R127. 

/-••. INITIALIZE I/O PORTS LABELS •«-•»•—•.«.........•.....«.„.. 

/ Labels/variables related to I/O ports operation. """" —————— — 

dl^HV? 1 ^ CqU 0Ah ' * /maximum # for debounce counter. 

SiS-M-! B ? e " CqU 000000108 ' /Use to turn on P21. ehut eve" thing else off 

l eC t CqU 000000018 to turn on P20, shut ever? thinf else off 

2frH-!!if2 000010008 ' Ufle ^ turn on P23 shut ever? thinl else off 

h \fr - ~ i CqU 000001008 lOee to turn on P22, shut every thing else off 

di P _sw_read equ UUOOOOB ,Use to set P2H to read dip switch 



p01m_ini equ 01000101B /P04-P07 . input. 

/Normal external memory (N/A) 
;No PI for Z86E31. 
/Internal stack only. 
/P03-POO - input. 

lll-ini CqU ii mU1B /Default to input (high Impedance). 

p3m_ini C qu 00000001B /P33-P30 . input 

/P37-P34 - output 

/Digital mode for P31, P32. 

- /Push-pull active for P2. 

Zll'll eqU 110111118 ibits - 0. use for freq select 

Sa-~?i -ii CqU 001000008 ib^S - !• Use for freq select 

p2m_in_all equ 11111111B , H . 

,Thle ifl thc value for PCON. 

/-■-- INTBRUPTS LABELS -•———•—••—•—....■■..,.......„„.„..„ 

Labels/variables related to int erupt control parameters""""""""""""""""""""""""""""""" 

equ o ?°? oooob " M "d*^ 

ipr.ini equ 00010U0B /Priority IRQ0,2, 4 , 1. 5, 3 ? 

/™.U„....! qU 000000008 /Clear out all IRQ initially. 

;-»-«• TIKERa LABELS «••«■-■»— 

I ^i a x^ l8blC8 rclated to T0 and/or T1 controir'TOis'vIIuerirrtr^'userw^ 

pre0_100usec equ HOOIOOIB /Value for PREO that give TO resolution of .Imsec/count 

/TO is setup as single pass only. Set bitO for 'Modulo*. 
/The 6-bit counter - 500. Whenever this reaches 0 then 
/TO get decremented by l . it takes .1 msec for PREO to 
/count down from 50 to 0. 

tO_lmsec equ OAH -value for TO that would time out every 1 msec. 



tmr_ini 



-A10- 

equ OOOOOOOOB ;Uee to set initial value for THR'e register. 



REGISTERS DEFINITION .« — ..«««««-« — ........ ...... ....... ........ ......... 

; The section below de tinning the labels for the particular memory location and/or group. 

...«....«..«.*«...... ...a.. ......I.................................... ..«....«««.. 



ADDITIONAL REGISTERS ..«•«•.««- .....a...... .«.«*««..• ............. 

; These registers reside in ERF Bank F of Working Register group 0 



PO 


EQU 


00H 


S 


PI 


EQU 


01H 


* 


P2 


EQU 


02H 


i 


P3 


EQU 


03H 


» 


PCON 


EQU 


00H 


;Port Configuration register 


SMR 


EQU 


OBH 


;Stop Mode Recovery Register 


WDTMR 


EQU 


OFH 


;Hatch Dog Timer Register 



; 



CONTROLLING INPUT REGISTERS ..«—« — .•••• — ...«. — «. ——« — ..«.-...—«..-. — «- 

; Using Working Register Group 0 for controlling input parameters such as DIP switch 
; Input, mode select, switch mode and frequency select. 

;««.«««.. ..«««. .««««. ««..«.««..•»..«««.«.«.««««........«.».•.«.«•«... •...«.....«.. ...... 

; Storing input DIP switch from 1-8. 
;Storing input DIP switch from 9-10. 

;Storing the decoded lower 6 bit received from RF signal 
j Storing the decoded upper 2 bit received from RF signal 

;Store mode select, switch mode selector as defined below 

- 0 »> Not ; B . mode 
1 «> ft ' mode selected. 

- 0 ■> Not . Cc. : mode. 
1 •> . C ' mode selected. 



DIP_SW_L0WBYTE 


equ 


04H 


DIP_SW_HIBYTE 


equ 


05H 


DATA_IN_LOWBYTE 


equ 


06H 


DATA_I N_H I BYTE 


equ 


07H 


CONTROL_ INPUTS 


equ 


08H 



bitO 



bitl 



bit2 



0 -> Not 

1 «> . ft 



^ mode. 

mode selected. 



bit3 » Not used for ease of coding should be 0. 
bit4 - Not used for ease of coding should be 0. 



bit5 



bite 



0 »> Channel 1 normal switch mode. 

1 «> Channel 1 constant pressure switch mode. 

0 • > Channel 2 normal switch mode. 

1 ■> Channel 2 constant pressure switch mode. 



bit7 - 



USER_FLAGS equ 09H 

DEBOUNCE_COUNTER equ OAH 

P2M_COPY equ OBH 

OLD_INPUT equ OCH 

NEW_ INPUT equ ODH 

P0_INPUT equ OEH 

ROTATE_COUNTER equ OFH 



Not use for ease of coding should be 0. 
; Store user define flag control bits. 
; Store debounce value for reading external inputs. 
; Mirror image of P2M register for reading capability. 
•Use to store previous input of the entire port. 
•Use to store current input of the entir port. 
; Store PO input. 

; Store the I of rotate task to be performed. 



... WORKING REGISTER GROUP 1 «..«.*-.—.«--. 
Reserve variable for Radio int erupts value 



... GROUP 0 



TO_MULTIPLIER 




equ 


10H 


TO VALUE 




equ 


11H 


BIT COUNTER 




equ 


12H 


BIT_0_POSITION_ 


LO 


equ 


13H 


BIT 0 POSITION* 


"hi 


equ 


14H 


bit_i_position" 


~lo 


equ 


15H 


B t T_1 "POSITION^ 


"hi 


equ 


16H 



;The number of TO time out without Radio interupts. 
;1 count o 1 msec. 

; Store the value of TO when access. 
;Store the t) of bits received in the data packet. 
;Store the bit position of the packet data 
*;Store the bit position of the packet data 
.Store the bit position of the packet data 
.Store the bit position of the packet data 



DATA FLAGS 



-All- 

equ 1FH ; Flags control bit. 

bltO ■ 0 »> no valid on-time pulse width detected. 
- 1 «*> valid on- time pulse width detected. 

bitl - 0 -> first edge not detected yet. 
« 1 «> first edge already detected 

bit2 • 0 -> 10 msec has HOT elapsed from last pulse 
■ 1 «> 10 msec has elapsed from last pulse. 

bit7 ■ 0 o> On time pulse width is for logic 1. 
« 1 o On time pulse width is for logic 0 



GROUP 0 



;--o. MACRO DEFINITION ».B a «a BB « B .«B S .«a<t 8 a»*» a B a . B s 8 «.eo««« S B.««.«. B ....«o a .««.«.. e .o« B a 

; HATCH DOG TIMER MACROS .- 

WDT : MACRO 

.byte %5F j Enable Watch dog timer. 

.byte %FF .-Disable Hatch Dog timer. 

ENDMAC 

; TIMER CONTROLS MACROS- 

RELOAD_T0 : MACRO 

or TMR,tt00000001B ;Set bitO to reload TO, auto clear 

ENDMAC - ^ ;after load by micro. 

ENABLE_T0_COUNT : MACRO 

or TMR.tfOOOOOOlOB ;Set bitl to enable TO count. 

ENDMAC 

DISABLE_T0_COUNT: MACRO 

and TMR, H11111101B 
ENDMAC 

RELOADJTl: MACRO 

or TMR, ttOOOOOlOOB ;Set bitO to reload Tl, auto clear 

ENDMAC ; after load by micro. 

ENABLE_Tl_COUNT: MACRO 

or TMR, 800001000B ;Set bitl to enable Tl count. 

ENDMAC 

DISABLE_Tl_COUNT : MACRO 

and TMR,ftllll0111B 
ENDMAC 

RES ET_MULT I PLI ER : MACRO 

clr T0_MULTIPLIER j Clear TO multiplier. 

ENDMAC 

; - TIMER CONTROLS MACROS - - 

; - DATA BITS CONTROL MACROS 

R£SET_BIT_COUNTER: MACRO 

Id BIT_COUNTER, ft 01H ;Set B I T_COUNTER to ' l'(lBt bit) 

ENDMAC 

RESET_BIT_0_POSITION: MACRO 

Id BIT_0_POSITION LO,filllllll0B;Set BIT POSITION to the 1st bit. 

Id BIT_0_POSITION_HI,»11111111B; ~ 
ENDMAC ~ 

RESETBIT1POSITION : MACRO 

Id BIT_l_POSITION_LO.«00000001B;Set BIT_POSITION to the 1st bit. 

Id BIT_l_POSITION~HI,«00000000B; 

ENDMAC 

LOGIC_l : MACRO 

or DATA_FLAGS. fllOOOOOOOB ;Set bit7 of flags. 
ENDMAC 



-A12- 



LOGIC 0: MACRO t ^ r ^ 

and DATA_FLAGS,«01111111B ;Clear bit7 of flags. 

ENDMAC 

TEN MSEC PASSED: MACRO ' • 

~ or DATA_FLAGS. ftOOOOOlOOB ;Set bit2 of flags. 

ENDMAC 

TEN MSEC NOT PASSED: MACRO • ' 

~ and DATA_FLAGS.«11111011B ;Clear bit2 of flags. 

ENDMAC 



* 

ENDMAC 



DATA BITS CONTROL MACROS 

;af ter load by micro. 



